%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Archivo: times.m
% Dado el tipo de evento retorna el intervalo de tiempo en el que debe volver
% a ocurrir dicho evento, haciendo una realizacion de la variable aleatoria
% que lo modela.

function ret = times(event_type)
	switch(event_type)
		case 1 % Tiempo entre arrbos a R
			ret = expon(3.1873);
		case 2 % Tiempo de servicio en R
			ret = unif(5/60, 30/60);
		case 3 % Tiempo de servicio en en E1
			ret = expon(3/60);
		case 4 % Tiempo de servicio en E3
			ret = normal(1.995, 0.00832);
		case 5 % Tiempo de servicio en M1
			ret = expon(3.5);
		case 6 % Tiempo de servicio en M2
			ret = expon(8);
		case 7 % Tiempo de servicio en E2
			ret = expon(4);
		case 8 % Tiempo de servicio en C1
			ret = expon(2.5);
		case 9 % Tiempo de servicio en C2
			ret = expon(2.5);
		case 10 % Tiempo de servicio en C3
			ret = expon(2.5);
		case 11 % Tiempo en completar el formulario
			ret = unif(3.5, 4.5);
		otherwise
			error('Tipo de evento desconocido');
	end	
end
